﻿Public Class FrmPrincipal

    Private Sub TipoProductoToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TipoProductoToolStripMenuItem.Click
        Dim newMDIChild As New TipoProducto
        newMDIChild.MdiParent = Me
        newMDIChild.Show()
    End Sub

    Private Sub ProductoToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ProductoToolStripMenuItem.Click
        Dim newMDIChild As New Producto
        newMDIChild.MdiParent = Me
        newMDIChild.Show()
    End Sub

    Private Sub InsumosToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles InsumosToolStripMenuItem.Click
        Dim newMDIChild As New Insumo
        newMDIChild.MdiParent = Me
        newMDIChild.Show()
    End Sub

    Private Sub ProductoInsumoToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ProductoInsumoToolStripMenuItem.Click
        Dim newMDIChild As New ProductoInsumo
        newMDIChild.MdiParent = Me
        newMDIChild.Show()
    End Sub

    Private Sub DemandaToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DemandaToolStripMenuItem.Click
        Dim newMDIChild As New Demanda
        newMDIChild.MdiParent = Me
        newMDIChild.Show()
    End Sub

    Private Sub TrabajadorToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TrabajadorToolStripMenuItem.Click
        Dim newMDIChild As New Trabajador
        newMDIChild.MdiParent = Me
        newMDIChild.Show()
    End Sub

    Private Sub TurnoToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TurnoToolStripMenuItem.Click
        Dim newMDIChild As New Turno
        newMDIChild.MdiParent = Me
        newMDIChild.Show()
    End Sub
End Class
